* lisp/simple.el (blink-matching-open): Better behavior in minibuffer

diff --git a/lisp/simple.el b/lisp/simple.el
index cf1912ade4f7acc7ce0a5359805553b993cc3806..31efe3896d4d7eb068dbfeeb8c8ea53bbb5f1900 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -6992,8 +6992,9 @@ The function should return non-nil if the two tokens do not match.")
                     (buffer-substring blinkpos (1+ blinkpos))))
                   ;; There is nothing to show except the char itself.
                   (t (buffer-substring blinkpos (1+ blinkpos))))))
-            (message "Matches %s"
-                     (substring-no-properties open-paren-line-string)))))))))
+            (minibuffer-message
+             "Matches %s"
+             (substring-no-properties open-paren-line-string)))))))))
 
 (defvar blink-paren-function 'blink-matching-open
   "Function called, if non-nil, whenever a close parenthesis is inserted.